home *** CD-ROM | disk | FTP | other *** search
Unknown | 1990-09-13 | 8.8 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 3e 44 49 | 46 31 32 2f 39 2f 39 30 |.....>DI|F12/9/90|
|00000010| 0d 00 14 15 f4 20 56 45 | 52 53 49 4f 4e 20 31 32 |..... VE|RSION 12|
|00000020| 2f 39 2f 39 30 0d 00 1e | 16 f4 4f 4e 20 45 52 52 |/9/90...|..ON ERR|
|00000030| 4f 52 20 2a 44 45 53 4b | 54 4f 50 0d 00 28 0a 54 |OR *DESK|TOP..(.T|
|00000040| 45 53 54 3d a3 0d 00 32 | 08 f2 41 53 4d 0d 00 3c |EST=...2|..ASM..<|
|00000050| 07 eb 31 33 0d 00 46 28 | 45 31 36 25 3d a1 28 31 |..13..F(|E16%=.(1|
|00000060| 36 29 3a 54 57 4f 31 35 | 25 3d 32 5e 31 35 3a 4c |6):TWO15|%=2^15:L|
|00000070| 4c 32 3d 32 2a 94 28 aa | 28 32 29 29 0d 00 50 16 |L2=2*.(.|(2))..P.|
|00000080| ef 31 39 2c 31 2c 32 34 | 2c 26 41 30 2c 26 41 30 |.19,1,24|,&A0,&A0|
|00000090| 2c 30 0d 00 5a 10 de 20 | 41 50 25 28 31 30 2c 31 |,0..Z.. |AP%(10,1|
|000000a0| 30 29 0d 00 64 16 de 20 | 42 50 30 20 34 30 30 2c |0)..d.. |BP0 400,|
|000000b0| 20 42 50 31 20 34 30 30 | 0d 00 6e 15 4e 25 3d 32 | BP1 400|..n.N%=2|
|000000c0| 35 36 3a 41 50 25 28 35 | 2c 35 29 3d 31 0d 00 78 |56:AP%(5|,5)=1..x|
|000000d0| 2c 41 41 25 3d 31 30 30 | 30 3a f4 20 53 49 5a 45 |,AA%=100|0:. SIZE|
|000000e0| 20 4f 46 20 53 4d 41 4c | 4c 20 53 51 55 41 52 45 | OF SMAL|L SQUARE|
|000000f0| 20 49 53 20 32 2a 41 41 | 25 0d 00 82 37 46 58 3d | IS 2*AA|%...7FX=|
|00000100| 31 2f 31 30 32 34 3a f4 | 20 44 49 53 54 41 4e 43 |1/1024:.| DISTANC|
|00000110| 45 20 4f 46 20 53 43 52 | 45 45 4e 20 46 52 4f 4d |E OF SCR|EEN FROM|
|00000120| 20 41 50 45 52 54 55 52 | 45 20 49 53 20 31 2f 46 | APERTUR|E IS 1/F|
|00000130| 0d 00 8c 16 4c 41 4d 42 | 44 41 25 3d 32 35 30 3a |....LAMB|DA%=250:|
|00000140| 43 43 25 3d 32 31 0d 00 | 96 0f 45 4d 31 35 3d a1 |CC%=21..|..EM15=.|
|00000150| 28 2d 31 35 29 0d 00 a0 | 10 87 3a 2a 50 4f 49 4e |(-15)...|..:*POIN|
|00000160| 54 45 52 20 30 0d 00 aa | 08 c8 97 20 ee 0d 00 b4 |TER 0...|... ....|
|00000170| 08 fb 20 31 35 0d 00 be | c6 f1 8a 30 2c 35 29 3b |.. 15...|...0,5);|
|00000180| 22 20 20 54 68 69 73 20 | 69 73 20 61 20 70 72 6f |" This |is a pro|
|00000190| 67 72 61 6d 6d 65 20 74 | 6f 20 63 61 6c 63 75 6c |gramme t|o calcul|
|000001a0| 61 74 65 20 74 68 65 22 | 3a f1 22 69 6e 74 65 6e |ate the"|:."inten|
|000001b0| 73 69 74 79 20 6f 66 20 | 61 20 46 72 61 75 65 6e |sity of |a Frauen|
|000001c0| 68 6f 66 65 72 20 64 69 | 66 66 72 61 63 74 69 6f |hofer di|ffractio|
|000001d0| 6e 22 3a f1 22 70 61 74 | 74 65 72 6e 20 6f 6e 20 |n":."pat|tern on |
|000001e0| 61 20 73 63 72 65 65 6e | 20 70 6c 61 63 65 64 20 |a screen| placed |
|000001f0| 61 20 6c 6f 6e 67 20 77 | 61 79 22 3a f1 22 66 72 |a long w|ay":."fr|
|00000200| 6f 6d 20 61 6e 20 61 70 | 65 72 74 75 72 65 20 69 |om an ap|erture i|
|00000210| 6c 6c 75 6d 69 6e 61 74 | 65 64 20 62 79 20 61 22 |lluminat|ed by a"|
|00000220| 3a f1 22 70 61 72 61 6c | 6c 65 6c 20 62 65 61 6d |:."paral|lel beam|
|00000230| 20 6f 66 20 6c 69 67 68 | 74 2e 22 0d 00 c8 4b f1 | of ligh|t."...K.|
|00000240| 8a 30 2c 32 30 29 3b 22 | 44 6f 20 79 6f 75 20 77 |.0,20);"|Do you w|
|00000250| 61 6e 74 20 61 6e 20 65 | 78 70 6c 61 6e 61 74 69 |ant an e|xplanati|
|00000260| 6f 6e 22 3a f1 22 6f 66 | 20 74 68 65 20 64 69 61 |on":."of| the dia|
|00000270| 67 72 61 6d 73 20 61 73 | 20 74 68 65 79 20 61 70 |grams as| they ap|
|00000280| 70 65 61 72 3f 22 0d 00 | d2 23 fb 20 36 30 3a f1 |pear?"..|.#. 60:.|
|00000290| 8a 30 2c 32 34 29 3b 22 | 4e 4f 22 3a f1 8a 30 2c |.0,24);"|NO":..0,|
|000002a0| 32 36 29 3b 22 59 45 53 | 22 0d 00 dc 2c fb 20 31 |26);"YES|"...,. 1|
|000002b0| 35 3a f1 8a 30 2c 33 30 | 29 3b 22 43 6c 69 63 6b |5:..0,30|);"Click|
|000002c0| 20 6f 6e 20 59 45 53 20 | 6f 72 20 4e 4f 22 3a f1 | on YES |or NO":.|
|000002d0| 8a 30 2c 30 29 0d 00 e6 | 15 fb 20 36 30 3a c8 97 |.0,0)...|.. 60:..|
|000002e0| 20 b8 20 31 30 30 2c 31 | 39 30 0d 00 f0 0c 21 54 | . 100,1|90....!T|
|000002f0| 57 3d 31 30 32 34 0d 00 | fa 2d de 20 53 4e 25 20 |W=1024..|.-. SN% |
|00000300| 34 2a 28 21 54 57 29 2b | 38 2c 43 53 25 20 34 2a |4*(!TW)+|8,CS% 4*|
|00000310| 28 21 54 57 29 2b 38 3a | de 20 53 4e 4f 25 20 34 |(!TW)+8:|. SNO% 4|
|00000320| 31 31 32 0d 01 04 05 f5 | 0d 01 0e 0c c8 97 20 58 |112.....|...... X|
|00000330| 2c 59 2c 42 0d 01 18 38 | fd 20 42 3c 3e 30 20 80 |,Y,B...8|. B<>0 .|
|00000340| 20 58 3c 31 32 31 20 80 | 20 28 28 59 3e 31 33 30 | X<121 .| ((Y>130|
|00000350| 20 80 20 59 3c 32 30 30 | 29 20 84 20 28 59 3e 32 | . Y<200|) . (Y>2|
|00000360| 32 30 20 80 20 59 3c 32 | 37 30 29 29 0d 01 22 11 |20 . Y<2|70))..".|
|00000370| 44 49 53 50 4c 41 59 3d | 59 3c 32 30 30 0d 01 2c |DISPLAY=|Y<200..,|
|00000380| 0b db 3a 48 4c 50 3d a3 | 0d 01 36 0a f2 53 45 54 |..:HLP=.|..6..SET|
|00000390| 55 50 0d 01 4a 0e 54 53 | 54 45 50 3d 33 30 30 30 |UP..J.TS|TEP=3000|
|000003a0| 0d 01 54 0e 2a 50 4f 49 | 4e 54 45 52 20 30 0d 01 |..T.*POI|NTER 0..|
|000003b0| 5e 08 c8 97 20 ee 0d 01 | 68 10 c8 97 20 b8 20 32 |^... ...|h... . 2|
|000003c0| 30 30 2c 33 30 30 0d 01 | 72 2f 4f 4c 54 49 4d 45 |00,300..|r/OLTIME|
|000003d0| 3d 91 2b 54 53 54 45 50 | 3a f5 3a c8 97 20 58 2c |=.+TSTEP|:.:.. X,|
|000003e0| 59 2c 42 3a fd 20 42 3c | 3e 30 20 84 20 91 3e 4f |Y,B:. B<|>0 . .>O|
|000003f0| 4c 54 49 4d 45 0d 01 7c | 0b e7 20 42 3d 30 20 8c |LTIME..||.. B=0 .|
|00000400| 0d 01 86 33 58 3d b3 28 | 31 30 29 3a 59 3d b3 28 |...3X=.(|10):Y=.(|
|00000410| 31 30 29 3a 41 50 25 28 | 58 2c 59 29 3d 31 2d 41 |10):AP%(|X,Y)=1-A|
|00000420| 50 25 28 58 2c 59 29 3a | f2 42 49 47 41 3a f2 4c |P%(X,Y):|.BIGA:.L|
|00000430| 49 4c 41 0d 01 87 1c 42 | 3d 34 3a e7 20 4c 41 4d |ILA....B|=4:. LAM|
|00000440| 42 44 41 25 3d 31 30 30 | 30 20 8c 20 42 3d 31 0d |BDA%=100|0 . B=1.|
|00000450| 01 88 0e f2 4c 41 4d 42 | 44 41 28 42 29 0d 01 90 |....LAMB|DA(B)...|
|00000460| 19 54 53 54 45 50 3d 31 | 30 30 3a 58 3d 32 30 30 |.TSTEP=1|00:X=200|
|00000470| 3a 59 3d 34 35 30 0d 01 | 9a 0a e5 20 8d 54 48 42 |:Y=450..|... .THB|
|00000480| 0d 01 a4 10 cc 20 54 53 | 54 45 50 3d 32 30 30 30 |..... TS|TEP=2000|
|00000490| 0d 01 ae 05 cd 0d 01 b8 | 15 e7 20 48 4c 50 20 48 |........|.. HLP H|
|000004a0| 4c 50 3d a3 3a db 3a ef | 32 36 0d 01 c2 12 e7 20 |LP=.:.:.|26..... |
|000004b0| 59 3c 35 30 30 20 e5 20 | 8d 54 48 42 0d 01 cc 3d |Y<500 . |.THB...=|
|000004c0| 58 3d 31 2b 28 58 20 81 | 34 30 29 3a 59 3d 31 2b |X=1+(X .|40):Y=1+|
|000004d0| 28 28 59 2d 35 36 30 29 | 81 20 34 30 29 3a e7 20 |((Y-560)|. 40):. |
|000004e0| 58 3c 31 31 20 80 20 59 | 3c 31 31 20 80 20 58 3e |X<11 . Y|<11 . X>|
|000004f0| 30 20 80 20 59 3e 30 20 | 8c 0d 01 d6 2f e7 20 42 |0 . Y>0 |..../. B|
|00000500| 3d 34 20 8c 20 e7 20 41 | 50 25 28 58 2c 59 29 3d |=4 . . A|P%(X,Y)=|
|00000510| 30 20 41 50 25 28 58 2c | 59 29 3d 31 3a f2 42 49 |0 AP%(X,|Y)=1:.BI|
|00000520| 47 41 3a f2 4c 49 4c 41 | 0d 01 e0 2f e7 20 42 3d |GA:.LILA|.../. B=|
|00000530| 31 20 8c 20 e7 20 41 50 | 25 28 58 2c 59 29 3d 31 |1 . . AP|%(X,Y)=1|
|00000540| 20 41 50 25 28 58 2c 59 | 29 3d 30 3a f2 42 49 47 | AP%(X,Y|)=0:.BIG|
|00000550| 41 3a f2 4c 49 4c 41 0d | 01 ea 05 cd 0d 01 f4 0a |A:.LILA.|........|
|00000560| e5 20 8d 44 72 41 0d 01 | fe 04 0d 02 08 31 e7 20 |. .DrA..|.....1. |
|00000570| 58 3c 34 30 30 20 80 20 | 59 3c 35 32 30 20 80 20 |X<400 . |Y<520 . |
|00000580| 59 3e 34 30 30 20 8c 20 | ef 37 3a f2 44 49 46 46 |Y>400 . |.7:.DIFF|
|00000590| 52 41 43 54 3a e5 20 8d | 44 72 41 0d 02 12 04 0d |RACT:. .|DrA.....|
|000005a0| 02 1c 35 e7 20 58 3c 31 | 32 30 30 20 80 20 58 3e |..5. X<1|200 . X>|
|000005b0| 34 38 30 20 80 20 59 3c | 31 34 30 20 80 20 59 3e |480 . Y<|140 . Y>|
|000005c0| 39 30 20 f2 4c 41 4d 42 | 44 41 28 42 29 3a e5 20 |90 .LAMB|DA(B):. |
|000005d0| 8d 44 72 41 0d 02 26 05 | 3a 0d 02 30 0a f4 20 48 |.DrA..&.|:..0.. H|
|000005e0| 45 4c 50 0d 02 3a 31 e7 | 20 58 3e 58 4c 48 45 4c |ELP..:1.| X>XLHEL|
|000005f0| 50 20 80 20 58 3c 58 52 | 48 45 4c 50 20 80 20 59 |P . X<XR|HELP . Y|
|00000600| 3e 59 42 48 45 4c 50 20 | 80 20 59 3c 59 54 48 45 |>YBHELP |. Y<YTHE|
|00000610| 4c 50 20 8c 0d 02 44 21 | 20 20 20 48 4c 50 3d b9 |LP ...D!| HLP=.|
|00000620| 3a ef 32 36 3a ef 32 38 | 2c 31 36 2c 32 34 2c 33 |:.26:.28|,16,24,3|
|00000630| 38 2c 31 3a db 0d 02 4e | 88 20 20 20 f1 22 54 6f |8,1:...N|. ."To|
|00000640| 20 63 68 61 6e 67 65 20 | 74 68 65 20 61 70 65 72 | change |the aper|
|00000650| 74 75 72 65 2c 22 3b 3a | f1 22 63 6c 69 63 6b 22 |ture,";:|."click"|
|00000660| 3a f1 3a f1 22 53 45 4c | 45 43 54 20 28 6c 65 66 |:.:."SEL|ECT (lef|
|00000670| 74 20 62 75 74 74 6f 6e | 29 22 3a f1 22 74 6f 20 |t button|)":."to |
|00000680| 6d 61 6b 65 20 61 20 68 | 6f 6c 65 20 6f 72 22 3a |make a h|ole or":|
|00000690| f1 3a f1 22 41 44 4a 55 | 53 54 20 28 72 69 67 68 |.:."ADJU|ST (righ|
|000006a0| 74 20 62 75 74 74 6f 6e | 29 22 3a f1 22 74 6f 20 |t button|)":."to |
|000006b0| 66 69 6c 6c 20 6f 6e 65 | 20 69 6e 2e 22 0d 02 58 |fill one| in."..X|
|000006c0| 5e 20 20 20 f1 3a f1 3a | f1 3a f1 22 59 6f 75 20 |^ .:.:|.:."You |
|000006d0| 63 61 6e 20 63 68 61 6e | 67 65 20 74 68 65 22 3a |can chan|ge the":|
|000006e0| f1 3a f1 22 57 61 76 65 | 6c 65 6e 67 74 68 20 22 |.:."Wave|length "|
|000006f0| 3a f1 3a f1 22 75 73 69 | 6e 67 20 53 45 4c 45 43 |:.:."usi|ng SELEC|
|00000700| 54 20 28 2a 32 29 22 3a | f1 22 6f 72 20 41 44 4a |T (*2)":|."or ADJ|
|00000710| 55 53 54 20 28 2a 30 2e | 35 29 22 0d 02 62 0d 20 |UST (*0.|5)"..b. |
|00000720| 20 20 e5 20 8d 44 72 41 | 0d 02 6c 05 cd 0d 02 76 | . .DrA|..l....v|
|00000730| 04 0d 02 80 3e e7 20 28 | ac 20 54 45 53 54 29 20 |....>. (|. TEST) |
|00000740| 80 20 28 58 3e 58 4c 53 | 54 4f 50 20 80 20 58 3c |. (X>XLS|TOP . X<|
|00000750| 58 52 53 54 4f 50 20 80 | 20 59 3e 59 42 53 54 4f |XRSTOP .| Y>YBSTO|
|00000760| 50 20 80 20 59 3c 59 54 | 53 54 4f 50 29 20 8c 0d |P . Y<YT|STOP) ..|
|00000770| 02 8a 0c 2a 44 45 53 4b | 54 4f 50 0d 02 94 05 cc |...*DESK|TOP.....|
|00000780| 0d 02 9e 0a e5 20 8d 44 | 68 41 0d 02 a8 05 cd 0d |..... .D|hA......|
|00000790| 02 b2 05 fa 0d 02 bc 05 | e0 0d 02 c6 04 0d 02 d0 |........|........|
|000007a0| 0c dd 20 f2 53 45 54 55 | 50 0d 02 da 13 ef 20 32 |.. .SETU|P..... 2|
|000007b0| 38 2c 30 2c 33 31 2c 33 | 39 2c 32 39 0d 02 e4 0f |8,0,31,3|9,29....|
|000007c0| e6 20 36 33 20 c8 9c 20 | 31 39 32 0d 02 ee 39 ec |. 63 .. |192...9.|
|000007d0| 20 34 37 36 2c 31 39 36 | 3a df 20 31 32 37 39 2c | 476,196|:. 1279,|
|000007e0| 31 39 36 3a df 20 31 32 | 37 39 2c 31 30 30 30 3a |196:. 12|79,1000:|
|000007f0| df 20 34 37 36 2c 31 30 | 30 30 3a df 20 34 37 36 |. 476,10|00:. 476|
|00000800| 2c 31 39 36 0d 02 f8 10 | c8 97 20 b8 20 38 30 30 |,196....|.. . 800|
|00000810| 2c 36 30 30 0d 03 02 58 | e7 20 44 49 53 50 4c 41 |,600...X|. DISPLA|
|00000820| 59 20 f1 22 54 68 69 73 | 20 69 73 20 74 68 65 20 |Y ."This| is the |
|00000830| 73 63 72 65 65 6e 20 6f | 6e 20 77 68 69 63 68 20 |screen o|n which |
|00000840| 74 68 65 22 3a f1 22 69 | 6e 74 65 6e 73 69 74 79 |the":."i|ntensity|
|00000850| 20 70 61 74 74 65 72 6e | 20 77 69 6c 6c 20 62 65 | pattern| will be|
|00000860| 20 73 68 6f 77 6e 22 3a | f2 43 3a db 0d 03 0c 2f | shown":|.C:..../|
|00000870| ec 20 30 2c 31 35 32 3a | df 20 34 38 2c 31 38 30 |. 0,152:|. 48,180|
|00000880| 3a ec 20 34 30 2c 31 38 | 30 3a df 20 34 38 2c 31 |:. 40,18|0:. 48,1|
|00000890| 38 30 3a df 20 34 38 2c | 31 37 32 0d 03 16 2f ec |80:. 48,|172.../.|
|000008a0| 20 30 2c 31 33 32 3a df | 20 35 36 2c 31 36 38 3a | 0,132:.| 56,168:|
|000008b0| ec 20 34 38 2c 31 36 38 | 3a df 20 35 36 2c 31 36 |. 48,168|:. 56,16|
|000008c0| 38 3a df 20 35 36 2c 31 | 36 30 0d 03 20 2f ec 20 |8:. 56,1|60.. /. |
|000008d0| 30 2c 31 31 30 3a df 20 | 36 34 2c 31 35 32 3a ec |0,110:. |64,152:.|
|000008e0| 20 35 36 2c 31 35 32 3a | df 20 36 34 2c 31 35 32 | 56,152:|. 64,152|
|000008f0| 3a df 20 36 34 2c 31 34 | 38 0d 03 2a 50 e7 20 44 |:. 64,14|8..*P. D|
|00000900| 49 53 50 4c 41 59 20 f1 | 22 20 20 20 20 20 20 20 |ISPLAY .|" |
|00000910| 20 20 20 54 68 69 73 20 | 69 73 20 74 68 65 20 70 | This |is the p|
|00000920| 61 72 61 6c 6c 65 6c 20 | 69 6e 63 69 64 65 6e 74 |arallel |incident|
|00000930| 20 6c 69 67 68 74 2e 22 | 3a c8 97 20 b8 20 35 30 | light."|:.. . 50|
|00000940| 2c 31 32 30 3a f2 43 3a | db 0d 03 34 09 f2 4c 49 |,120:.C:|...4..LI|
|00000950| 4c 41 0d 03 3e 5e e7 20 | 44 49 53 50 4c 41 59 20 |LA..>^. |DISPLAY |
|00000960| f1 22 54 68 69 73 20 69 | 73 20 74 68 65 20 73 63 |."This i|s the sc|
|00000970| 72 65 65 6e 20 77 69 74 | 68 20 61 6e 20 61 70 65 |reen wit|h an ape|
|00000980| 72 74 75 72 65 20 74 6f | 20 20 74 72 61 6e 73 6d |rture to| transm|
|00000990| 69 74 20 74 68 65 20 6c | 69 67 68 74 2e 22 3a c8 |it the l|ight.":.|
|000009a0| 97 20 b8 20 31 32 30 2c | 31 38 30 3a f2 43 3a db |. . 120,|180:.C:.|
|000009b0| 0d 03 48 09 f2 42 49 47 | 41 0d 03 52 a6 e7 20 44 |..H..BIG|A..R.. D|
|000009c0| 49 53 50 4c 41 59 20 c8 | 97 20 b8 20 32 30 30 2c |ISPLAY .|. . 200,|
|000009d0| 36 30 30 3a f1 22 20 20 | 20 54 68 69 73 20 69 73 |600:." | This is|
|000009e0| 20 61 6e 20 65 6e 6c 61 | 72 67 65 6d 65 6e 74 20 | an enla|rgement |
|000009f0| 6f 66 20 74 68 65 20 73 | 63 72 65 65 6e 20 77 69 |of the s|creen wi|
|00000a00| 74 68 20 74 68 65 20 61 | 70 65 72 74 75 72 65 22 |th the a|perture"|
|00000a10| 3a f2 43 3a db 3a f1 22 | 59 6f 75 20 63 61 6e 20 |:.C:.:."|You can |
|00000a20| 75 73 65 20 69 74 20 74 | 6f 20 64 65 73 69 67 6e |use it t|o design|
|00000a30| 20 79 6f 75 72 20 6f 77 | 6e 20 20 20 20 20 20 20 | your ow|n |
|00000a40| 61 70 65 72 74 75 72 65 | 20 75 73 69 6e 67 20 74 |aperture| using t|
|00000a50| 68 65 20 6d 6f 75 73 65 | 2e 22 3a f2 43 3a db 0d |he mouse|.":.C:..|
|00000a60| 03 5c 16 ec 20 34 30 2c | 31 36 30 3a df 20 38 38 |.\.. 40,|160:. 88|
|00000a70| 30 2c 36 30 30 0d 03 66 | 67 e7 20 44 49 53 50 4c |0,600..f|g. DISPL|
|00000a80| 41 59 20 c8 97 20 b8 20 | 33 30 30 2c 33 30 30 3a |AY .. . |300,300:|
|00000a90| f1 22 54 68 69 73 20 69 | 73 20 74 68 65 20 72 61 |."This i|s the ra|
|00000aa0| 79 20 66 72 6f 6d 20 74 | 68 65 20 73 6f 75 72 63 |y from t|he sourc|
|00000ab0| 65 20 20 74 6f 20 74 68 | 65 20 63 65 6e 74 72 65 |e to th|e centre|
|00000ac0| 20 6f 66 20 74 68 65 20 | 76 69 65 77 69 6e 67 20 | of the |viewing |
|00000ad0| 73 63 72 65 65 6e 22 3a | f2 43 3a db 0d 03 70 43 |screen":|.C:...pC|
|00000ae0| e7 20 44 49 53 50 4c 41 | 59 20 db 3a f1 22 4e 6f |. DISPLA|Y .:."No|
|00000af0| 77 20 75 73 65 20 74 68 | 65 20 6d 6f 75 73 65 20 |w use th|e mouse |
|00000b00| 74 6f 20 64 69 72 65 63 | 74 22 3a f1 22 74 68 65 |to direc|t":."the|
|00000b10| 20 70 72 6f 67 72 61 6d | 6d 65 22 3a f2 43 3a 0d | program|me":.C:.|
|00000b20| 03 7a 38 db 3a ef 32 36 | 3a f1 8a 30 2c 31 36 29 |.z8.:.26|:..0,16)|
|00000b30| 3b 22 20 43 6f 6d 70 75 | 74 65 22 3a f1 22 20 64 |;" Compu|te":." d|
|00000b40| 69 66 66 72 61 63 74 69 | 6f 6e 22 3a f1 22 20 70 |iffracti|on":." p|
|00000b50| 61 74 74 65 72 6e 22 0d | 03 84 40 58 31 3d 34 30 |attern".|..@X1=40|
|00000b60| 30 3a 59 31 3d 34 30 30 | 3a 59 32 3d 59 31 2b 31 |0:Y1=400|:Y2=Y1+1|
|00000b70| 33 30 3a ec 20 30 2c 59 | 31 3a df 20 58 31 2c 59 |30:. 0,Y|1:. X1,Y|
|00000b80| 31 3a df 20 58 31 2c 59 | 32 3a df 20 30 2c 59 32 |1:. X1,Y|2:. 0,Y2|
|00000b90| 3a df 20 30 2c 59 31 0d | 03 8e 30 f1 8a 31 35 2c |:. 0,Y1.|..0..15,|
|00000ba0| 32 38 29 3b 22 20 57 61 | 76 65 6c 65 6e 67 74 68 |28);" Wa|velength|
|00000bb0| 20 20 20 3d 22 3a f1 20 | 8a 33 31 2c 32 38 29 3b | =":. |.31,28);|
|00000bc0| 4c 41 4d 42 44 41 25 0d | 03 98 46 58 3d 34 38 30 |LAMBDA%.|..FX=480|
|00000bd0| 3a 58 31 3d 58 2b 36 38 | 30 3a 59 31 3d 39 30 3a |:X1=X+68|0:Y1=90:|
|00000be0| 59 32 3d 59 31 2b 35 30 | 3a ec 20 58 2c 59 31 3a |Y2=Y1+50|:. X,Y1:|
|00000bf0| df 20 58 31 2c 59 31 3a | df 20 58 31 2c 59 32 3a |. X1,Y1:|. X1,Y2:|
|00000c00| df 20 58 2c 59 32 3a df | 20 58 2c 59 31 0d 03 a2 |. X,Y2:.| X,Y1...|
|00000c10| 13 f1 8a 31 36 2c 33 30 | 29 3b 22 48 65 6c 70 22 |...16,30|);"Help"|
|00000c20| 0d 03 ac 53 58 4c 48 45 | 4c 50 3d 34 38 30 3a 58 |...SXLHE|LP=480:X|
|00000c30| 52 48 45 4c 50 3d 58 4c | 48 45 4c 50 2b 31 37 30 |RHELP=XL|HELP+170|
|00000c40| 3a 59 42 48 45 4c 50 3d | 32 34 3a 59 54 48 45 4c |:YBHELP=|24:YTHEL|
|00000c50| 50 3d 59 42 48 45 4c 50 | 2b 35 30 3a c8 93 20 58 |P=YBHELP|+50:.. X|
|00000c60| 4c 48 45 4c 50 2c 59 42 | 48 45 4c 50 2c 31 37 30 |LHELP,YB|HELP,170|
|00000c70| 2c 35 30 0d 03 b6 13 f1 | 8a 33 32 2c 33 30 29 3b |,50.....|.32,30);|
|00000c80| 22 45 78 69 74 22 0d 03 | c0 54 58 4c 53 54 4f 50 |"Exit"..|.TXLSTOP|
|00000c90| 3d 31 30 30 36 3a 58 52 | 53 54 4f 50 3d 58 4c 53 |=1006:XR|STOP=XLS|
|00000ca0| 54 4f 50 2b 31 36 30 3a | 59 42 53 54 4f 50 3d 32 |TOP+160:|YBSTOP=2|
|00000cb0| 34 3a 59 54 53 54 4f 50 | 3d 59 42 53 54 4f 50 2b |4:YTSTOP|=YBSTOP+|
|00000cc0| 35 30 3a c8 93 20 58 4c | 53 54 4f 50 2c 59 42 53 |50:.. XL|STOP,YBS|
|00000cd0| 54 4f 50 2c 31 36 30 2c | 35 30 0d 03 ca 05 e1 0d |TOP,160,|50......|
|00000ce0| 03 d4 04 0d 03 de 08 dd | 20 f2 43 0d 03 e8 14 f5 |........| .C.....|
|00000cf0| 20 c8 97 20 58 2c 59 2c | 42 3a fd 20 42 3d 30 0d | .. X,Y,|B:. B=0.|
|00000d00| 03 f2 0b 2a 46 58 32 31 | 2c 39 0d 03 fc 3c f1 8a |...*FX21|,9...<..|
|00000d10| 30 2c 35 29 3b 22 43 6c | 69 63 6b 20 61 20 62 75 |0,5);"Cl|ick a bu|
|00000d20| 74 74 6f 6e 20 74 6f 20 | 63 6f 6e 74 69 6e 75 65 |tton to |continue|
|00000d30| 22 3b 3a f5 20 c8 97 20 | 58 2c 59 2c 42 3a fd 20 |";:. .. |X,Y,B:. |
|00000d40| 42 3c 3e 30 3a e1 0d 04 | 06 04 0d 04 10 0b dd 20 |B<>0:...|....... |
|00000d50| f2 42 49 47 41 0d 04 1a | 0d e6 20 31 35 20 c8 9c |.BIGA...|.. 15 ..|
|00000d60| 20 30 0d 04 24 2f ec 20 | 30 2c 35 36 30 3a df 20 | 0..$/. |0,560:. |
|00000d70| 34 30 30 2c 35 36 30 3a | df 20 34 30 30 2c 39 36 |400,560:|. 400,96|
|00000d80| 30 3a df 20 30 2c 39 36 | 30 3a df 20 30 2c 35 36 |0:. 0,96|0:. 0,56|
|00000d90| 30 0d 04 2e 26 e3 20 49 | 3d 30 20 b8 20 34 30 30 |0...&. I|=0 . 400|
|00000da0| 20 88 20 34 30 3a ec 20 | 49 2c 35 36 30 3a df 20 | . 40:. |I,560:. |
|00000db0| 49 2c 39 36 30 3a ed 0d | 04 38 26 e3 20 49 3d 35 |I,960:..|.8&. I=5|
|00000dc0| 36 30 20 b8 20 39 36 31 | 20 88 20 34 30 3a ec 20 |60 . 961| . 40:. |
|00000dd0| 30 2c 49 3a df 20 34 30 | 30 2c 49 3a ed 0d 04 42 |0,I:. 40|0,I:...B|
|00000de0| 34 e3 20 49 3d 31 20 b8 | 20 31 30 3a e3 20 4a 3d |4. I=1 .| 10:. J=|
|00000df0| 31 20 b8 20 31 30 3a e6 | 20 31 35 3a e7 20 41 50 |1 . 10:.| 15:. AP|
|00000e00| 25 28 49 2c 4a 29 3d 30 | 20 e6 20 30 20 c8 9c 20 |%(I,J)=0| . 0 .. |
|00000e10| 30 0d 04 4c 51 58 31 3d | 34 2b 34 30 2a 28 49 2d |0..LQX1=|4+40*(I-|
|00000e20| 31 29 3a 59 31 3d 34 30 | 2a 28 4a 2d 31 29 2b 35 |1):Y1=40|*(J-1)+5|
|00000e30| 36 34 3a ec 20 58 31 2c | 59 31 3a ec 20 58 31 2b |64:. X1,|Y1:. X1+|
|00000e40| 33 32 2c 59 31 3a f0 38 | 35 2c 58 31 2c 59 31 2b |32,Y1:.8|5,X1,Y1+|
|00000e50| 33 32 3a f0 38 35 2c 58 | 31 2b 33 32 2c 59 31 2b |32:.85,X|1+32,Y1+|
|00000e60| 33 32 0d 04 56 07 ed 3a | ed 0d 04 60 0f e6 20 36 |32..V..:|...`.. 6|
|00000e70| 33 20 c8 9c 20 31 39 32 | 0d 04 6a 05 e1 0d 04 74 |3 .. 192|..j....t|
|00000e80| 04 0d 04 7e 0b dd 20 f2 | 4c 49 4c 41 0d 04 88 0d |...~.. .|LILA....|
|00000e90| e6 20 31 35 20 c8 9c 20 | 30 0d 04 92 32 ec 20 39 |. 15 .. |0...2. 9|
|00000ea0| 36 2c 31 37 36 3a df 20 | 31 34 30 2c 31 37 36 3a |6,176:. |140,176:|
|00000eb0| df 20 31 34 30 2c 32 32 | 30 3a df 20 39 36 2c 32 |. 140,22|0:. 96,2|
|00000ec0| 32 30 3a df 20 39 36 2c | 31 38 30 0d 04 9c 34 e3 |20:. 96,|180...4.|
|00000ed0| 20 49 3d 31 20 b8 20 31 | 30 3a e3 20 4a 3d 31 20 | I=1 . 1|0:. J=1 |
|00000ee0| b8 20 31 30 3a e6 20 31 | 35 3a e7 20 41 50 25 28 |. 10:. 1|5:. AP%(|
|00000ef0| 49 2c 4a 29 3d 30 20 e6 | 20 30 20 c8 9c 20 30 0d |I,J)=0 .| 0 .. 0.|
|00000f00| 04 a6 20 f0 20 36 39 2c | 31 30 30 2b 34 2a 28 49 |.. . 69,|100+4*(I|
|00000f10| 2d 31 29 2c 31 38 30 2b | 34 2a 28 4a 2d 31 29 0d |-1),180+|4*(J-1).|
|00000f20| 04 b0 07 ed 3a ed 0d 04 | ba 0f e6 20 36 33 20 c8 |....:...|... 63 .|
|00000f30| 9c 20 31 39 32 0d 04 c4 | 05 e1 0d 04 ce 04 0d 04 |. 192...|........|
|00000f40| d8 0f dd 20 f2 44 49 46 | 46 52 41 43 54 0d 04 e2 |... .DIF|FRACT...|
|00000f50| 0b 2a 46 58 32 31 2c 39 | 0d 04 ec 4f 4b 25 3d 30 |.*FX21,9|...OK%=0|
|00000f60| 3a e3 20 49 3d 31 20 b8 | 20 31 30 3a e3 20 4a 3d |:. I=1 .| 10:. J=|
|00000f70| 31 20 b8 20 31 30 3a e7 | 20 41 50 25 28 49 2c 4a |1 . 10:.| AP%(I,J|
|00000f80| 29 3d 31 20 4b 25 3d 4b | 25 2b 31 3a 21 28 42 50 |)=1 K%=K|%+1:!(BP|
|00000f90| 30 2b 34 2a 4b 25 29 3d | 49 3a 21 28 42 50 31 2b |0+4*K%)=|I:!(BP1+|
|00000fa0| 34 2a 4b 25 29 3d 4a 0d | 04 f6 07 ed 3a ed 0d 04 |4*K%)=J.|....:...|
|00000fb0| f7 0c e7 20 4b 25 3d 30 | 20 e1 0d 05 00 5e e3 20 |... K%=0| ....^. |
|00000fc0| 49 25 3d 30 20 b8 20 21 | 54 57 3a 54 48 3d 32 2a |I%=0 . !|TW:TH=2*|
|00000fd0| af 2a 49 25 2f 28 21 54 | 57 29 3a 21 28 53 4e 25 |.*I%/(!T|W):!(SN%|
|00000fe0| 2b 34 2a 49 25 29 3d 54 | 57 4f 31 35 25 2a 28 b5 |+4*I%)=T|WO15%*(.|
|00000ff0| 28 54 48 29 2f 4b 25 29 | 3a 21 28 43 53 25 2b 34 |(TH)/K%)|:!(CS%+4|
|00001000| 2a 49 25 29 3d 54 57 4f | 31 35 25 2a 28 9b 28 54 |*I%)=TWO|15%*(.(T|
|00001010| 48 29 2f 4b 25 29 3a ed | 0d 05 0a 26 ea 20 42 50 |H)/K%):.|...&. BP|
|00001020| 2c 42 50 50 30 2c 42 50 | 50 31 2c 42 42 30 2c 42 |,BPP0,BP|P1,BB0,B|
|00001030| 42 31 2c 42 42 2c 44 42 | 42 2c 44 42 42 59 0d 05 |B1,BB,DB|B,DBBY..|
|00001040| 14 3f 4c 3d 34 2a 4b 25 | 2b 34 3a de 20 42 50 20 |.?L=4*K%|+4:. BP |
|00001050| 4c 2c 42 50 50 30 20 4c | 2c 42 50 50 31 20 4c 2c |L,BPP0 L|,BPP1 L,|
|00001060| 42 42 30 20 4c 2c 42 42 | 31 20 4c 2c 42 42 20 4c |BB0 L,BB|1 L,BB L|
|00001070| 2c 44 42 42 20 4c 2c 44 | 42 42 59 20 4c 0d 05 1e |,DBB L,D|BBY L...|
|00001080| 0c e7 20 4b 25 3d 30 20 | e1 0d 05 28 14 5a 3d af |.. K%=0 |...(.Z=.|
|00001090| 2a 41 41 25 2f 4c 41 4d | 42 44 41 25 3a 0d 05 32 |*AA%/LAM|BDA%:..2|
|000010a0| 19 50 58 4f 25 3d 38 38 | 30 2d 32 3a 50 59 4f 25 |.PXO%=88|0-2:PYO%|
|000010b0| 3d 36 30 30 2d 32 0d 05 | 3c 6a e3 20 49 3d 30 20 |=600-2..|<j. I=0 |
|000010c0| b8 20 32 30 30 3a e7 20 | 49 3c 3e 31 30 30 20 41 |. 200:. |I<>100 A|
|000010d0| 4e 47 4c 45 3d 28 34 2a | 46 58 2a 5a 2a 28 49 2d |NGLE=(4*|FX*Z*(I-|
|000010e0| 31 30 30 29 29 3a 21 28 | 53 4e 4f 25 2b 34 2a 49 |100)):!(|SNO%+4*I|
|000010f0| 29 3d 54 57 4f 31 35 25 | 2a 28 b5 28 41 4e 47 4c |)=TWO15%|*(.(ANGL|
|00001100| 45 29 2f 41 4e 47 4c 45 | 29 5e 32 20 8b 20 21 28 |E)/ANGLE|)^2 . !(|
|00001110| 53 4e 4f 25 2b 34 2a 49 | 29 3d 54 57 4f 31 35 25 |SNO%+4*I|)=TWO15%|
|00001120| 0d 05 46 05 ed 0d 05 50 | 04 0d 05 5a 07 d1 3d 30 |..F....P|...Z..=0|
|00001130| 0d 05 64 0a 47 3d 46 58 | 2a 34 0d 05 6e 1c 58 25 |..d.G=FX|*4..n.X%|
|00001140| 3d 54 57 4f 31 35 25 2a | 28 47 2a 5a 29 2a 28 21 |=TWO15%*|(G*Z)*(!|
|00001150| 54 57 29 2f af 3a 0d 05 | 78 47 e3 20 49 3d 31 20 |TW)/.:..|xG. I=1 |
|00001160| b8 20 4b 25 3a 49 34 3d | 49 2a 34 3a 21 28 42 50 |. K%:I4=|I*4:!(BP|
|00001170| 50 30 2b 49 34 29 3d 21 | 28 42 50 30 2b 49 34 29 |P0+I4)=!|(BP0+I4)|
|00001180| 2a 58 25 3a 21 28 42 50 | 50 31 2b 49 34 29 3d 21 |*X%:!(BP|P1+I4)=!|
|00001190| 28 42 50 31 2b 49 34 29 | 2a 58 25 3a ed 0d 05 82 |(BP1+I4)|*X%:....|
|000011a0| 0a 44 44 25 3d 39 36 0d | 05 8c 15 e3 20 49 3d 31 |.DD%=96.|.... I=1|
|000011b0| 20 b8 20 4b 25 3a 49 34 | 3d 34 2a 49 0d 05 96 18 | . K%:I4|=4*I....|
|000011c0| 21 28 44 42 42 2b 49 34 | 29 3d 21 28 42 50 50 30 |!(DBB+I4|)=!(BPP0|
|000011d0| 2b 49 34 29 0d 05 a0 19 | 21 28 44 42 42 59 2b 49 |+I4)....|!(DBBY+I|
|000011e0| 34 29 3d 21 28 42 50 50 | 31 2b 49 34 29 0d 05 aa |4)=!(BPP|1+I4)...|
|000011f0| 21 21 28 42 42 31 2b 49 | 34 29 3d 21 28 42 50 50 |!!(BB1+I|4)=!(BPP|
|00001200| 31 2b 49 34 29 2a 28 2d | 44 44 25 2d 31 29 0d 05 |1+I4)*(-|DD%-1)..|
|00001210| b4 21 21 28 42 42 30 2b | 49 34 29 3d 21 28 42 50 |.!!(BB0+|I4)=!(BP|
|00001220| 50 30 2b 49 34 29 2a 28 | 2d 44 44 25 2d 31 29 0d |P0+I4)*(|-DD%-1).|
|00001230| 05 be 35 21 28 42 42 31 | 2b 49 34 29 3d 21 28 42 |..5!(BB1|+I4)=!(B|
|00001240| 50 50 31 2b 49 34 29 2a | 28 2d 44 44 25 2d 31 29 |PP1+I4)*|(-DD%-1)|
|00001250| 2b 21 28 42 50 50 30 2b | 49 34 29 2a 28 2d 44 44 |+!(BPP0+|I4)*(-DD|
|00001260| 25 2d 31 29 0d 05 c8 05 | ed 0d 05 d2 0b 21 43 43 |%-1)....|.....!CC|
|00001270| 3d 43 43 25 0d 05 dc 17 | 21 4f 4f 3d 50 59 4f 25 |=CC%....|!OO=PYO%|
|00001280| 2b 34 2a 28 2d 44 44 25 | 2d 31 29 0d 05 e6 24 50 |+4*(-DD%|-1)...$P|
|00001290| 50 58 4f 25 3d 50 58 4f | 25 2b 34 2a 28 2d 31 2d |PXO%=PXO|%+4*(-1-|
|000012a0| 44 44 25 29 3a f4 20 21 | 46 46 46 20 53 45 54 0d |DD%):. !|FFF SET.|
|000012b0| 05 f0 16 21 53 4e 50 3d | 53 4e 25 3a 21 43 53 50 |...!SNP=|SN%:!CSP|
|000012c0| 3d 43 53 25 3a 0d 05 fa | 22 21 4b 34 3d 34 2a 4b |=CS%:...|"!K4=4*K|
|000012d0| 25 3a 21 44 44 41 3d 44 | 44 25 3a 21 58 50 45 52 |%:!DDA=D|D%:!XPER|
|000012e0| 3d 2d 32 2a 44 44 25 0d | 06 04 16 21 42 42 50 3d |=-2*DD%.|...!BBP=|
|000012f0| 42 42 3a 21 44 42 42 50 | 3d 44 42 42 3a 0d 06 0e |BB:!DBBP|=DBB:...|
|00001300| 19 44 25 3d 28 53 4e 4f | 25 2b 34 2a 28 31 30 30 |.D%=(SNO|%+4*(100|
|00001310| 2b 44 44 25 29 29 0d 06 | 18 12 21 43 4f 4e 53 31 |+DD%))..|..!CONS1|
|00001320| 3d 28 21 54 57 29 2d 31 | 0d 06 22 1c 21 46 46 46 |=(!TW)-1|..".!FFF|
|00001330| 46 3d 53 4e 4f 25 2b 34 | 2a 28 31 30 30 2d 31 2d |F=SNO%+4|*(100-1-|
|00001340| 44 44 25 29 0d 06 2c 05 | 3a 0d 06 36 13 e3 20 59 |DD%)..,.|:..6.. Y|
|00001350| 25 3d 2d 44 44 25 20 b8 | 20 44 44 25 0d 06 40 14 |%=-DD% .| DD%..@.|
|00001360| e3 20 49 34 3d 34 20 b8 | 20 21 4b 34 20 88 20 34 |. I4=4 .| !K4 . 4|
|00001370| 0d 06 4a 22 21 28 42 42 | 31 2b 49 34 29 3d 21 28 |..J"!(BB|1+I4)=!(|
|00001380| 42 42 31 2b 49 34 29 2b | 21 28 44 42 42 59 2b 49 |BB1+I4)+|!(DBBY+I|
|00001390| 34 29 0d 06 54 17 21 28 | 42 42 2b 49 34 29 20 3d |4)..T.!(|BB+I4) =|
|000013a0| 21 28 42 42 31 2b 49 34 | 29 0d 06 5e 05 ed 0d 06 |!(BB1+I4|)..^....|
|000013b0| 68 36 21 50 50 3d 50 50 | 58 4f 25 20 20 20 20 20 |h6!PP=PP|XO% |
|000013c0| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 54 48 49 | | :. THI|
|000013d0| 53 20 49 53 20 43 48 41 | 4e 47 45 44 20 49 4e 20 |S IS CHA|NGED IN |
|000013e0| 46 41 53 54 0d 06 72 2a | 21 4f 4f 3d 21 4f 4f 2b |FAST..r*|!OO=!OO+|
|000013f0| 34 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |4 | |
|00001400| 3a f4 20 4e 4f 54 20 43 | 48 41 4e 47 45 44 0d 06 |:. NOT C|HANGED..|
|00001410| 7c 34 21 58 50 45 52 3d | 2d 44 44 25 2d 44 44 25 ||4!XPER=|-DD%-DD%|
|00001420| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 4c 4f 4f | | :. LOO|
|00001430| 50 20 43 4f 55 4e 54 45 | 52 2c 20 43 48 41 4e 47 |P COUNTE|R, CHANG|
|00001440| 45 44 0d 06 86 2a 44 25 | 3d 44 25 2d 34 20 20 20 |ED...*D%|=D%-4 |
|00001450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a f4 | | :.|
|00001460| 20 4e 4f 54 20 43 48 41 | 4e 47 45 44 0d 06 90 26 | NOT CHA|NGED...&|
|00001470| 21 44 44 50 3d 21 44 25 | 20 20 20 20 20 20 20 20 |!DDP=!D%| |
|00001480| 20 20 20 20 20 20 20 20 | 3a f4 20 43 48 41 4e 47 | |:. CHANG|
|00001490| 45 44 0d 06 9a 26 21 46 | 3d 21 46 46 46 46 20 20 |ED...&!F|=!FFFF |
|000014a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a f4 | | :.|
|000014b0| 20 43 48 41 4e 47 45 44 | 0d 06 a4 33 21 42 42 50 | CHANGED|...3!BBP|
|000014c0| 3d 42 42 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |=BB | |
|000014d0| 20 20 20 20 3a f4 20 41 | 52 52 41 59 20 56 41 4c | :. A|RRAY VAL|
|000014e0| 55 45 53 20 43 48 41 4e | 47 45 44 0d 06 ae 12 21 |UES CHAN|GED....!|
|000014f0| 49 49 3d 30 3a e6 20 30 | 20 c8 9c 20 30 0d 06 b8 |II=0:. 0| .. 0...|
|00001500| 0d ec 20 21 50 50 2c 21 | 4f 4f 0d 06 c2 0a d6 20 |.. !PP,!|OO..... |
|00001510| 46 41 53 54 0d 06 cc 2d | c8 97 20 58 4d 4f 55 53 |FAST...-|.. XMOUS|
|00001520| 45 2c 59 4d 4f 55 53 45 | 2c 42 55 54 54 4f 4e 3a |E,YMOUSE|,BUTTON:|
|00001530| e7 20 42 55 54 54 4f 4e | 3e 30 20 e5 20 8d 64 6a |. BUTTON|>0 . .dj|
|00001540| 46 0d 06 d6 04 0d 06 e0 | 08 ed 20 59 25 0d 06 ea |F.......|.. Y%...|
|00001550| 36 e6 20 36 33 20 c8 9c | 20 31 39 32 3a f1 8a 30 |6. 63 ..| 192:..0|
|00001560| 2c 30 29 3b 22 54 69 6d | 65 20 69 6e 20 73 65 63 |,0);"Tim|e in sec|
|00001570| 73 3d 20 22 3b a8 28 91 | 2f 31 30 30 29 3b 22 20 |s= ";.(.|/100);" |
|00001580| 20 20 22 0d 06 f4 05 e1 | 0d 06 fe 04 0d 07 12 0a | ".....|........|
|00001590| dd 20 f2 41 53 4d 0d 07 | 1c 13 de 20 41 53 4d 53 |. .ASM..|... ASMS|
|000015a0| 50 41 43 45 20 34 30 30 | 30 0d 07 26 0c 56 56 44 |PACE 400|0..&.VVD|
|000015b0| 55 3d 32 35 36 0d 07 30 | 07 4f 3d 30 0d 07 3a 14 |U=256..0|.O=0..:.|
|000015c0| e3 20 50 41 53 53 3d 30 | 20 b8 20 32 20 88 20 32 |. PASS=0| . 2 . 2|
|000015d0| 0d 07 44 0f 50 25 3d 41 | 53 4d 53 50 41 43 45 0d |..D.P%=A|SMSPACE.|
|000015e0| 07 4e 0a 5b 4f 50 54 20 | 30 0d 07 58 17 2e 49 49 |.N.[OPT |0..X..II|
|000015f0| 20 20 45 51 55 44 20 30 | 20 20 20 20 20 20 3b 30 | EQUD 0| ;0|
|00001600| 0d 07 62 17 2e 43 43 20 | 20 45 51 55 44 20 30 20 |..b..CC | EQUD 0 |
|00001610| 20 20 20 20 20 3b 34 0d | 07 6c 17 2e 50 50 20 20 | ;4.|.l..PP |
|00001620| 45 51 55 44 20 30 20 20 | 20 20 20 20 3b 38 0d 07 |EQUD 0 | ;8..|
|00001630| 76 18 2e 4f 4f 20 20 45 | 51 55 44 20 30 20 20 20 |v..OO E|QUD 0 |
|00001640| 20 20 20 3b 31 32 0d 07 | 80 18 2e 54 57 20 20 45 | ;12..|...TW E|
|00001650| 51 55 44 20 30 20 20 20 | 20 20 20 3b 31 36 0d 07 |QUD 0 | ;16..|
|00001660| 8a 18 2e 46 46 46 20 45 | 51 55 44 20 34 20 20 20 |...FFF E|QUD 4 |
|00001670| 20 20 20 3b 32 30 0d 07 | 94 1d 2e 46 20 20 20 45 | ;20..|...F E|
|00001680| 51 55 44 20 30 20 20 20 | 20 20 20 20 20 20 20 20 |QUD 0 | |
|00001690| 3b 32 34 0d 07 9e 1d 2e | 4b 34 20 20 45 51 55 44 |;24.....|K4 EQUD|
|000016a0| 20 30 20 20 3b 34 2a 4b | 25 20 20 20 20 3b 32 38 | 0 ;4*K|% ;28|
|000016b0| 0d 07 a8 1d 2e 53 4e 50 | 20 45 51 55 44 20 30 20 |.....SNP| EQUD 0 |
|000016c0| 20 3b 53 4e 25 20 20 20 | 20 20 3b 33 32 0d 07 b2 | ;SN% | ;32...|
|000016d0| 1d 2e 43 53 50 20 45 51 | 55 44 20 30 20 20 3b 43 |..CSP EQ|UD 0 ;C|
|000016e0| 53 25 20 20 20 20 20 3b | 33 36 0d 07 bc 1d 2e 42 |S% ;|36.....B|
|000016f0| 42 50 20 45 51 55 44 20 | 30 20 20 3b 42 42 20 20 |BP EQUD |0 ;BB |
|00001700| 20 20 20 20 3b 34 30 0d | 07 c6 1d 2e 44 42 42 50 | ;40.|....DBBP|
|00001710| 20 45 51 55 44 20 30 20 | 20 3b 44 42 42 20 20 20 | EQUD 0 | ;DBB |
|00001720| 20 3b 34 34 0d 07 d0 1d | 2e 44 44 41 20 45 51 55 | ;44....|.DDA EQU|
|00001730| 44 20 30 20 20 20 3b 44 | 44 20 20 20 20 20 3b 34 |D 0 ;D|D ;4|
|00001740| 38 0d 07 da 1d 2e 44 44 | 50 20 45 51 55 44 20 30 |8.....DD|P EQUD 0|
|00001750| 20 20 20 3b 44 25 20 20 | 20 20 20 3b 35 32 0d 07 | ;D% | ;52..|
|00001760| e4 1d 2e 43 4f 4e 53 31 | 20 45 51 55 44 20 31 30 |...CONS1| EQUD 10|
|00001770| 32 33 20 20 20 20 20 20 | 3b 35 36 0d 07 ee 1d 2e |23 |;56.....|
|00001780| 58 50 45 52 20 45 51 55 | 44 20 30 20 20 20 20 20 |XPER EQU|D 0 |
|00001790| 20 20 20 20 20 3b 36 30 | 0d 07 f8 1d 2e 46 46 46 | ;60|.....FFF|
|000017a0| 46 20 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |F EQUD 0| |
|000017b0| 20 20 3b 36 34 0d 08 02 | 40 2e 54 4e 54 20 45 51 | ;64...|@.TNT EQ|
|000017c0| 55 53 20 22 32 33 34 35 | 36 37 38 39 31 38 38 38 |US "2345|67891888|
|000017d0| 22 3a f4 20 46 4f 52 20 | 28 56 44 55 32 33 29 2c |":. FOR |(VDU23),|
|000017e0| 31 37 2c 32 2c 54 49 4e | 54 2c 30 2c 30 2c 30 2c |17,2,TIN|T,0,0,0,|
|000017f0| 30 2c 30 2c 30 0d 08 0c | 09 2e 46 41 53 54 0d 08 |0,0,0...|..FAST..|
|00001800| 16 31 41 44 52 20 52 39 | 2c 49 49 20 20 20 20 20 |.1ADR R9|,II |
|00001810| 20 20 20 20 20 20 3b 20 | 42 41 53 45 20 52 45 47 | ; |BASE REG|
|00001820| 49 53 54 45 52 20 e3 20 | dc 20 42 4c 4f 43 4b 0d |ISTER . |. BLOCK.|
|00001830| 08 20 23 4c 44 52 20 52 | 31 2c 5b 52 39 2c 23 38 |. #LDR R|1,[R9,#8|
|00001840| 5d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |] | ;|
|00001850| 50 50 0d 08 2a 10 41 44 | 44 20 52 31 2c 52 31 2c |PP..*.AD|D R1,R1,|
|00001860| 23 34 0d 08 34 23 53 54 | 52 20 52 31 2c 5b 52 39 |#4..4#ST|R R1,[R9|
|00001870| 2c 23 38 5d 20 20 20 20 | 20 20 20 20 20 20 20 20 |,#8] | |
|00001880| 20 20 3b 50 50 0d 08 3e | 1d 4c 44 52 20 52 30 2c | ;PP..>|.LDR R0,|
|00001890| 5b 52 39 2c 23 32 38 5d | 20 20 20 20 20 3b 34 2a |[R9,#28]| ;4*|
|000018a0| 4b 25 0d 08 48 1b 4c 44 | 52 20 52 31 2c 5b 52 39 |K%..H.LD|R R1,[R9|
|000018b0| 2c 23 34 30 5d 20 20 20 | 20 20 3b 42 42 0d 08 52 |,#40] | ;BB..R|
|000018c0| 1c 4c 44 52 20 52 32 2c | 5b 52 39 2c 23 34 34 5d |.LDR R2,|[R9,#44]|
|000018d0| 20 20 20 20 20 3b 44 42 | 42 0d 08 5c 1c 4c 44 52 | ;DB|B..\.LDR|
|000018e0| 20 52 33 2c 5b 52 39 2c | 23 33 32 5d 20 20 20 20 | R3,[R9,|#32] |
|000018f0| 20 3b 53 4e 50 0d 08 66 | 1c 4c 44 52 20 52 34 2c | ;SNP..f|.LDR R4,|
|00001900| 5b 52 39 2c 23 33 36 5d | 20 20 20 20 20 3b 43 53 |[R9,#36]| ;CS|
|00001910| 50 0d 08 70 1d 4d 4f 56 | 20 52 36 2c 23 30 20 20 |P..p.MOV| R6,#0 |
|00001920| 20 20 20 20 20 20 20 20 | 20 3b 47 25 3d 30 0d 08 | | ;G%=0..|
|00001930| 7a 1d 4d 4f 56 20 52 37 | 2c 23 30 20 20 20 20 20 |z.MOV R7|,#0 |
|00001940| 20 20 20 20 20 20 3b 48 | 25 3d 30 0d 08 84 23 4d | ;H|%=0...#M|
|00001950| 4f 56 20 52 31 31 2c 23 | 30 20 20 20 20 20 20 20 |OV R11,#|0 |
|00001960| 20 20 20 3b 4c 4f 4f 50 | 20 49 4e 44 45 58 0d 08 | ;LOOP| INDEX..|
|00001970| 8e 05 3a 0d 08 98 0b 2e | 4d 4d 4c 4f 4f 50 0d 08 |..:.....|MMLOOP..|
|00001980| a2 12 4c 44 52 20 52 38 | 2c 5b 52 31 2c 23 34 5d |..LDR R8|,[R1,#4]|
|00001990| 0d 08 ac 13 4c 44 52 20 | 52 35 2c 5b 52 32 2c 23 |....LDR |R5,[R2,#|
|000019a0| 34 5d 21 0d 08 b6 10 41 | 44 44 20 52 38 2c 52 35 |4]!....A|DD R8,R5|
|000019b0| 2c 52 38 0d 08 c0 24 53 | 54 52 20 52 38 2c 5b 52 |,R8...$S|TR R8,[R|
|000019c0| 31 2c 23 34 5d 21 20 20 | 20 20 20 20 20 20 20 20 |1,#4]! | |
|000019d0| 20 3b c7 96 20 42 42 0d | 08 ca 16 4d 4f 56 20 52 | ;.. BB.|...MOV R|
|000019e0| 38 2c 52 38 2c 20 41 53 | 52 20 23 31 35 0d 08 d4 |8,R8, AS|R #15...|
|000019f0| 23 4c 44 52 20 52 35 2c | 5b 52 39 2c 23 35 36 5d |#LDR R5,|[R9,#56]|
|00001a00| 20 20 20 20 20 20 20 20 | 20 20 20 3b 31 30 32 33 | | ;1023|
|00001a10| 0d 08 de 20 80 20 52 38 | 2c 52 38 2c 52 35 20 20 |... . R8|,R8,R5 |
|00001a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 54 48 25 | | ;TH%|
|00001a30| 0d 08 e8 24 4d 4f 56 20 | 52 38 2c 52 38 2c 41 53 |...$MOV |R8,R8,AS|
|00001a40| 4c 20 23 32 20 20 20 20 | 20 20 20 20 20 20 3b 34 |L #2 | ;4|
|00001a50| 2a 54 48 25 0d 08 f2 05 | 3a 0d 08 fc 29 4c 44 52 |*TH%....|:...)LDR|
|00001a60| 20 52 31 30 2c 5b 52 33 | 2c 52 38 5d 20 20 20 20 | R10,[R3|,R8] |
|00001a70| 20 20 20 20 20 20 20 3b | 21 53 4e 50 2b 34 2a 54 | ;|!SNP+4*T|
|00001a80| 48 25 0d 09 06 11 41 44 | 44 20 52 36 2c 52 36 2c |H%....AD|D R6,R6,|
|00001a90| 52 31 30 0d 09 10 29 4c | 44 52 20 52 31 30 2c 5b |R10...)L|DR R10,[|
|00001aa0| 52 34 2c 52 38 5d 20 20 | 20 20 20 20 20 20 20 20 |R4,R8] | |
|00001ab0| 20 3b 21 43 53 50 2b 34 | 2a 54 48 25 0d 09 1a 11 | ;!CSP+4|*TH%....|
|00001ac0| 41 44 44 20 52 37 2c 52 | 37 2c 52 31 30 0d 09 24 |ADD R7,R|7,R10..$|
|00001ad0| 12 41 44 44 20 52 31 31 | 2c 52 31 31 2c 23 34 0d |.ADD R11|,R11,#4.|
|00001ae0| 09 2e 0f 43 4d 50 53 20 | 52 31 31 2c 52 30 0d 09 |...CMPS |R11,R0..|
|00001af0| 38 0e 42 4c 54 20 4d 4d | 4c 4f 4f 50 0d 09 42 05 |8.BLT MM|LOOP..B.|
|00001b00| 3a 0d 09 4c 20 4c 44 52 | 20 52 35 2c 5b 52 39 2c |:..L LDR| R5,[R9,|
|00001b10| 23 32 34 5d 20 20 20 20 | 20 20 20 20 20 20 20 3b |#24] | ;|
|00001b20| 46 0d 09 56 39 41 44 44 | 20 52 35 2c 52 35 2c 23 |F..V9ADD| R5,R5,#|
|00001b30| 34 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |4 | ;|
|00001b40| f4 21 46 2b 3d 34 3b 41 | 25 3d 28 28 44 25 2a 21 |.!F+=4;A|%=((D%*!|
|00001b50| 28 21 46 29 29 3e 3e 31 | 35 29 0d 09 60 20 53 54 |(!F))>>1|5)..` ST|
|00001b60| 52 20 52 35 2c 5b 52 39 | 2c 23 32 34 5d 20 20 20 |R R5,[R9|,#24] |
|00001b70| 20 20 20 20 20 20 20 20 | 3b 46 0d 09 6a 24 4c 44 | |;F..j$LD|
|00001b80| 52 20 52 38 2c 5b 52 35 | 5d 20 20 20 20 20 20 20 |R R8,[R5|] |
|00001b90| 20 20 20 20 20 20 20 20 | 3b 53 4e 4f 2e 2e 0d 09 | |;SNO....|
|00001ba0| 74 10 3b 53 54 52 20 52 | 35 2c 5b 52 39 5d 0d 09 |t.;STR R|5,[R9]..|
|00001bb0| 7e 21 4c 44 52 20 52 33 | 2c 5b 52 39 2c 23 35 32 |~!LDR R3|,[R9,#52|
|00001bc0| 5d 20 20 20 20 20 20 20 | 20 20 20 20 3b 44 25 0d |] | ;D%.|
|00001bd0| 09 88 10 4d 55 4c 20 52 | 30 2c 52 38 2c 52 33 0d |...MUL R|0,R8,R3.|
|00001be0| 09 92 16 4d 4f 56 20 52 | 30 2c 52 30 2c 20 41 53 |...MOV R|0,R0, AS|
|00001bf0| 52 20 23 31 35 0d 09 9c | 33 4d 55 4c 20 52 32 2c |R #15...|3MUL R2,|
|00001c00| 52 36 2c 52 36 20 20 20 | 20 20 20 20 20 20 20 20 |R6,R6 | |
|00001c10| 20 20 20 3b 43 25 3d 28 | 47 25 2a 47 25 2b 48 25 | ;C%=(|G%*G%+H%|
|00001c20| 2a 48 25 29 3e 3e 31 35 | 0d 09 a6 13 4d 4c 41 20 |*H%)>>15|....MLA |
|00001c30| 52 32 2c 52 37 2c 52 37 | 2c 52 32 0d 09 b0 16 4d |R2,R7,R7|,R2....M|
|00001c40| 4f 56 20 52 32 2c 52 32 | 2c 20 41 53 52 20 23 31 |OV R2,R2|, ASR #1|
|00001c50| 35 0d 09 ba 10 4d 55 4c | 20 52 31 2c 52 30 2c 52 |5....MUL| R1,R0,R|
|00001c60| 32 0d 09 c4 05 3a 0d 09 | ce 2c 4d 4f 56 53 20 52 |2....:..|.,MOVS R|
|00001c70| 32 2c 52 31 2c 20 41 53 | 52 20 23 31 34 20 20 20 |2,R1, AS|R #14 |
|00001c80| 20 20 20 20 20 3b 20 ab | 32 28 52 32 29 20 b8 20 | ; .|2(R2) . |
|00001c90| 52 38 0d 09 d8 0d 4d 4f | 56 20 52 38 2c 23 30 0d |R8....MO|V R8,#0.|
|00001ca0| 09 e2 37 2e 4c 47 4c 4f | 4f 50 3a 4d 4f 56 53 20 |..7.LGLO|OP:MOVS |
|00001cb0| 52 32 2c 52 32 2c 41 53 | 52 20 23 31 3a 41 44 44 |R2,R2,AS|R #1:ADD|
|00001cc0| 4e 45 20 52 38 2c 52 38 | 2c 23 31 3a 42 4e 45 20 |NE R8,R8|,#1:BNE |
|00001cd0| 4c 47 4c 4f 4f 50 0d 09 | ec 2c 4c 44 52 20 52 35 |LGLOOP..|.,LDR R5|
|00001ce0| 2c 5b 52 39 5d 20 20 20 | 20 20 20 20 20 20 20 20 |,[R9] | |
|00001cf0| 20 20 20 20 20 3b 49 49 | 20 49 53 20 c7 97 20 bb | ;II| IS .. .|
|00001d00| 55 45 0d 09 f6 0d 43 4d | 50 20 52 35 2c 52 38 0d |UE....CM|P R5,R8.|
|00001d10| 0a 00 0c 42 45 51 20 53 | 4b 49 50 0d 0a 0a 05 3a |...BEQ S|KIP....:|
|00001d20| 0d 0a 14 2e 4c 44 52 20 | 52 31 2c 5b 52 39 2c 23 |....LDR |R1,[R9,#|
|00001d30| 38 5d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |8] | |
|00001d40| 3b 50 50 20 20 3b 20 df | 20 54 48 45 20 86 0d 0a |;PP ; .| THE ...|
|00001d50| 1e 0e 4d 4f 56 20 52 30 | 2c 23 33 37 0d 0a 28 23 |..MOV R0|,#37..(#|
|00001d60| 4c 44 52 20 52 32 2c 5b | 52 39 2c 23 31 32 5d 20 |LDR R2,[|R9,#12] |
|00001d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 4f 4f 0d | | ;OO.|
|00001d80| 0a 32 11 53 57 49 20 22 | 4f 53 5f 50 6c 6f 74 22 |.2.SWI "|OS_Plot"|
|00001d90| 0d 0a 3c 05 3a 0d 0a 46 | 0f 53 54 52 20 52 38 2c |..<.:..F|.STR R8,|
|00001da0| 5b 52 39 5d 0d 0a 50 14 | 4d 4f 56 20 52 35 2c 52 |[R9]..P.|MOV R5,R|
|00001db0| 38 2c 20 41 53 4c 23 36 | 0d 0a 5a 10 80 20 52 35 |8, ASL#6|..Z.. R5|
|00001dc0| 2c 52 35 2c 23 32 35 35 | 0d 0a 64 0e 41 44 52 20 |,R5,#255|..d.ADR |
|00001dd0| 52 30 2c 54 4e 54 0d 0a | 6e 23 53 54 52 42 20 52 |R0,TNT..|n#STRB R|
|00001de0| 35 2c 5b 52 30 2c 23 32 | 5d 20 20 20 20 20 20 20 |5,[R0,#2|] |
|00001df0| 20 20 20 20 20 20 3b c8 | 9c 0d 0a 78 25 53 57 49 | ;.|...x%SWI|
|00001e00| 20 56 56 44 55 2b 32 33 | 20 20 20 20 20 20 20 20 | VVDU+23| |
|00001e10| 20 20 20 20 20 20 20 20 | 20 3b ef 20 32 33 0d 0a | | ;. 23..|
|00001e20| 82 0d 4d 4f 56 20 52 31 | 2c 23 39 0d 0a 8c 13 53 |..MOV R1|,#9....S|
|00001e30| 57 49 20 22 4f 53 5f 57 | 72 69 74 65 4e 22 0d 0a |WI "OS_W|riteN"..|
|00001e40| 96 05 3a 0d 0a a0 27 53 | 57 49 20 56 56 44 55 2b |..:...'S|WI VVDU+|
|00001e50| 31 38 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |18 | |
|00001e60| 20 20 20 3b 20 ef 20 31 | 38 2c 0d 0a aa 0d 4d 4f | ; . 1|8,....MO|
|00001e70| 56 20 52 30 2c 23 30 0d | 0a b4 22 53 57 49 20 4f |V R0,#0.|.."SWI O|
|00001e80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e90| 20 20 20 20 20 20 20 3b | 30 0d 0a be 2a 4d 4f 56 | ;|0...*MOV|
|00001ea0| 20 52 38 2c 52 38 2c 20 | 41 53 52 20 23 32 20 20 | R8,R8, |ASR #2 |
|00001eb0| 20 20 20 20 20 20 20 20 | 20 3b 20 28 49 25 20 81 | | ; (I% .|
|00001ec0| 20 34 29 0d 0a c8 24 4c | 44 52 20 52 31 2c 5b 52 | 4)...$L|DR R1,[R|
|00001ed0| 39 2c 23 34 5d 20 20 20 | 20 20 20 20 20 20 20 20 |9,#4] | |
|00001ee0| 20 20 20 3b 43 43 25 0d | 0a d2 10 4d 55 4c 20 52 | ;CC%.|...MUL R|
|00001ef0| 30 2c 52 38 2c 52 31 0d | 0a dc 2a 53 57 49 20 4f |0,R8,R1.|..*SWI O|
|00001f00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001f10| 20 20 20 20 20 20 20 3b | 20 57 52 49 54 45 20 49 | ;| WRITE I|
|00001f20| 54 0d 0a e6 05 3a 0d 0a | f0 05 3a 0d 0a fa 09 2e |T....:..|..:.....|
|00001f30| 53 4b 49 50 0d 0b 04 39 | 4c 44 52 20 52 30 2c 5b |SKIP...9|LDR R0,[|
|00001f40| 52 39 2c 23 36 30 5d 20 | 20 20 20 20 20 20 20 20 |R9,#60] | |
|00001f50| 20 20 20 20 3b 58 50 45 | 52 2c 20 6d 61 69 6e 20 | ;XPE|R, main |
|00001f60| 6c 6f 6f 70 20 20 63 6f | 6e 74 72 6f 6c 0d 0b 0e |loop co|ntrol...|
|00001f70| 11 41 44 44 53 20 52 30 | 2c 52 30 2c 23 31 0d 0b |.ADDS R0|,R0,#1..|
|00001f80| 18 13 53 54 52 20 52 30 | 2c 5b 52 39 2c 23 36 30 |..STR R0|,[R9,#60|
|00001f90| 5d 0d 0b 22 0c 42 4c 54 | 20 46 41 53 54 0d 0b 2c |]..".BLT| FAST..,|
|00001fa0| 05 3a 0d 0b 36 23 4c 44 | 52 20 52 31 2c 5b 52 39 |.:..6#LD|R R1,[R9|
|00001fb0| 2c 23 38 5d 20 20 20 20 | 20 20 20 20 20 20 20 20 |,#8] | |
|00001fc0| 20 20 3b 50 50 0d 0b 40 | 0e 4d 4f 56 20 52 30 2c | ;PP..@|.MOV R0,|
|00001fd0| 23 33 37 0d 0b 4a 23 4c | 44 52 20 52 32 2c 5b 52 |#37..J#L|DR R2,[R|
|00001fe0| 39 2c 23 31 32 5d 20 20 | 20 20 20 20 20 20 20 20 |9,#12] | |
|00001ff0| 20 20 20 3b 4f 4f 0d 0b | 54 11 53 57 49 20 22 4f | ;OO..|T.SWI "O|
|00002000| 53 5f 50 6c 6f 74 22 0d | 0b 5e 0f 4d 4f 56 20 52 |S_Plot".|.^.MOV R|
|00002010| 31 35 2c 52 31 34 0d 0b | 68 05 5d 0d 0b 72 0a ed |15,R14..|h.]..r..|
|00002020| 20 50 41 53 53 0d 0b 7c | 16 24 54 4e 54 3d bd 31 | PASS..||.$TNT=.1|
|00002030| 37 2b bd 32 2b c4 37 2c | bd 30 29 0d 0b 86 05 e1 |7+.2+.7,|.0).....|
|00002040| 0d 0b 90 05 3a 0d 0b 9a | 0a dd 20 f2 42 41 53 0d |....:...|.. .BAS.|
|00002050| 0b a4 14 ea 20 41 25 2c | 42 25 2c 43 25 2c 45 25 |.... A%,|B%,C%,E%|
|00002060| 2c 49 25 0d 0b ae 0e f4 | 20 40 20 4d 41 52 4b 45 |,I%.....| @ MARKE|
|00002070| 52 0d 0b b8 13 e3 20 58 | 25 3d 2d 44 44 25 20 b8 |R..... X|%=-DD% .|
|00002080| 20 44 44 25 0d 0b c2 0d | 47 25 3d 30 3a 48 25 3d | DD%....|G%=0:H%=|
|00002090| 30 0d 0b cc 4c e3 20 4d | 34 3d 34 20 b8 20 34 2a |0...L. M|4=4 . 4*|
|000020a0| 4b 25 3a 21 28 42 42 2b | 4d 34 29 3d 21 28 42 42 |K%:!(BB+|M4)=!(BB|
|000020b0| 2b 4d 34 29 2b 21 28 44 | 42 42 2b 4d 34 29 3a 54 |+M4)+!(D|BB+M4):T|
|000020c0| 48 25 3d 28 21 28 42 42 | 2b 4d 34 29 20 81 20 54 |H%=(!(BB|+M4) . T|
|000020d0| 57 4f 31 35 25 29 20 83 | 20 21 54 57 3a 0d 0b d6 |WO15%) .| !TW:...|
|000020e0| 1e e7 20 54 48 25 3c 30 | 20 54 48 25 3d 54 48 25 |.. TH%<0| TH%=TH%|
|000020f0| 2b 21 54 57 3a e5 20 8d | 64 56 4b 0d 0b e0 29 47 |+!TW:. .|dVK...)G|
|00002100| 25 3d 47 25 2b 21 28 43 | 53 25 2b 34 2a 54 48 25 |%=G%+!(C|S%+4*TH%|
|00002110| 29 3a 48 25 3d 48 25 2b | 21 28 53 4e 25 2b 34 2a |):H%=H%+|!(SN%+4*|
|00002120| 54 48 25 29 0d 0b ea 05 | ed 0d 0b f4 0d 21 50 50 |TH%)....|.....!PP|
|00002130| 3d 21 50 50 2b 34 0d 0b | fe 18 43 25 3d 28 47 25 |=!PP+4..|..C%=(G%|
|00002140| 2a 47 25 2b 48 25 2a 48 | 25 29 3e 3e 31 35 0d 0c |*G%+H%*H|%)>>15..|
|00002150| 08 1f 21 46 2b 3d 34 3a | 41 25 3d 28 28 44 25 2a |..!F+=4:|A%=((D%*|
|00002160| 21 28 21 46 29 29 20 3e | 3e 20 31 35 29 0d 0c 12 |!(!F)) >|> 15)...|
|00002170| 0c 42 25 3d 43 25 2a 41 | 25 0d 0c 1c 0d 42 25 3d |.B%=C%*A|%....B%=|
|00002180| 42 25 3e 3e 31 34 0d 0c | 26 05 3a 0d 0c 30 37 45 |B%>>14..|&.:..07E|
|00002190| 25 3d 30 3a 41 25 3d 30 | 3a 44 44 44 25 3d 31 3a |%=0:A%=0|:DDD%=1:|
|000021a0| e3 20 52 25 3d 30 20 b8 | 20 31 35 3a e7 20 28 42 |. R%=0 .| 15:. (B|
|000021b0| 25 20 80 20 44 44 44 25 | 29 3c 3e 30 20 41 25 3d |% . DDD%|)<>0 A%=|
|000021c0| 45 25 0d 0c 3a 1c 45 25 | 3d 45 25 2b 31 3a 44 44 |E%..:.E%|=E%+1:DD|
|000021d0| 44 25 3d 44 44 44 25 2b | 44 44 44 25 3a ed 0d 0c |D%=DDD%+|DDD%:...|
|000021e0| 44 09 49 25 3d 41 25 0d | 0c 4e 1c f1 8a 30 2c 30 |D.I%=A%.|.N...0,0|
|000021f0| 29 2c 49 25 2c 22 20 22 | 2c aa 28 45 4d 31 35 2b |),I%," "|,.(EM15+|
|00002200| 42 25 29 0d 0c 58 35 e7 | 20 49 25 3d 30 20 8c 20 |B%)..X5.| I%=0 . |
|00002210| e6 20 30 20 c8 9c 20 30 | 3a 8b 20 e6 20 28 49 25 |. 0 .. 0|:. . (I%|
|00002220| 20 3e 3e 32 29 2a 43 43 | 25 20 c8 9c 20 36 34 2a | >>2)*CC|% .. 64*|
|00002230| 28 49 25 20 83 20 34 29 | 0d 0c 62 10 f0 20 36 39 |(I% . 4)|..b.. 69|
|00002240| 2c 21 50 50 2c 21 4f 4f | 0d 0c 76 05 ed 0d 0c 80 |,!PP,!OO|..v.....|
|00002250| 05 e1 0d 0c 81 04 0d 0c | 8a 10 dd 20 f2 4c 41 4d |........|... .LAM|
|00002260| 42 44 41 28 42 29 0d 0c | 94 65 4c 41 4d 42 44 41 |BDA(B)..|.eLAMBDA|
|00002270| 25 3d 4c 41 4d 42 44 41 | 25 2a 32 5e 28 31 2b 32 |%=LAMBDA|%*2^(1+2|
|00002280| 2a 28 42 3d 31 29 29 3a | e7 20 4c 41 4d 42 44 41 |*(B=1)):|. LAMBDA|
|00002290| 25 3c 32 35 35 20 4c 41 | 4d 42 44 41 25 3d 32 35 |%<255 LA|MBDA%=25|
|000022a0| 30 3a 43 43 25 3d 32 31 | 20 8b 20 e7 20 4c 41 4d |0:CC%=21| . . LAM|
|000022b0| 42 44 41 25 3e 39 39 39 | 20 4c 41 4d 42 44 41 25 |BDA%>999| LAMBDA%|
|000022c0| 3d 31 30 30 30 3a 43 43 | 25 3d 31 0d 0c 9e 17 e7 |=1000:CC|%=1.....|
|000022d0| 20 4c 41 4d 42 44 41 25 | 3d 35 30 30 20 43 43 25 | LAMBDA%|=500 CC%|
|000022e0| 3d 34 0d 0c a8 26 f1 8a | 33 31 2c 32 38 29 3b 22 |=4...&..|31,28);"|
|000022f0| 20 20 20 20 22 3b 3a f1 | 8a 33 31 2c 32 38 29 3b | ";:.|.31,28);|
|00002300| 4c 41 4d 42 44 41 25 3b | 0d 0c b2 10 d1 3d 30 3a |LAMBDA%;|.....=0:|
|00002310| f5 20 fd 20 91 3e 32 30 | 0d 0c bc 05 e1 0d ff |. . .>20|....... |
+--------+-------------------------+-------------------------+--------+--------+